home *** CD-ROM | disk | FTP | other *** search
/ The See Clearly Method / TheSeeClearlyMethod.iso / Media / main.dir / 00023_Script_FW Rollover Member Change < prev    next >
Text File  |  2002-05-14  |  2KB  |  82 lines
  1. -- DESCRIPTION --
  2.  
  3. on getBehaviorDescription me
  4.   return ¼
  5.     "ROLLOVER MEMBER CHANGE" & RETURN & RETURN & ¼
  6.     "Change the sprite's cast member when the mouse rolls over the sprite." & RETURN & RETURN & ¼
  7.     "PARAMETERS:" & RETURN & ¼
  8.     "* Rollover cast member"
  9. end getBehaviorDescription
  10.  
  11.  
  12. on getBehaviorTooltip me
  13.   return ¼
  14.     "Use with graphic members." & RETURN & RETURN & ¼
  15.     "Swaps a sprite's cast member on rollover."
  16. end getBehaviorTooltip
  17.  
  18.  
  19.  
  20. -- HISTORY --
  21.  
  22. -- 22 October 1998, written for the D7 Behaviors Palette by James Newton
  23. --
  24. -- Modified 7 January, 2000 by T. Higgins to include the isOKToAttach
  25. -- event handler along with removing some redundant error checking.
  26. -- 5 March 2000: Modified to match Fireworks button order
  27. --               and be D7 and D8 compatible for Fireworks Importer <jba>
  28.  
  29.  
  30. property spriteNum
  31. property mySprite
  32. property myStandardMember
  33. property myRollovermember
  34.  
  35.  
  36. on beginSprite me
  37.   mySprite = sprite (me.spriteNum)
  38.   myStandardMember = mySprite.member
  39.   if myRollovermember = 0 then myRollovermember = member(mySprite.member.number+1)
  40. end
  41.  
  42.  
  43. on mouseEnter me
  44.   mySprite.member = myRolloverMember
  45.   cursor 280 
  46.   
  47. end mouseEnter
  48.  
  49.  
  50. on mouseLeave me
  51.   mySprite.member = myStandardMember
  52.   cursor 0
  53. end mouseLeave
  54.  
  55. on isOKToAttach (me, aSpriteType, aSpriteNum)
  56.   case aSpriteType of
  57.     #graphic:
  58.       return TRUE
  59.     #script:
  60.       return FALSE
  61.   end case
  62. end isOKToAttach 
  63.  
  64. on getPropertyDescriptionList
  65.   if the currentSpriteNum = 0 then exit
  66.   theMember = sprite(the currentSpriteNum).member
  67.   theMemberNumber = theMember.number
  68.   
  69.   return ¼
  70. [ ¼
  71.  #myRolloverMember: ¼
  72.  [ ¼
  73.   #comment: "Display which member on rollover?", ¼
  74.   #format:  #graphic, ¼
  75.   #default:  member (theMemberNumber + 1) ¼
  76.  ] ¼
  77. ]
  78. end getPropertyDescriptionList
  79. on mouseUp me
  80.  
  81. end
  82.